-- stack: in
-- format: 8 (HyperCard 1)
-- flags: 0x1000 (none)
-- protect password hash: 0
-- maximum user level: 5 (scripting)
-- window: Rect(x1=0, y1=0, x2=0, y2=0)
-- screen: Rect(x1=0, y1=0, x2=0, y2=0)
-- card dimensions: w=0 h=0
-- scroll: x=0 y=0
-- background count: 3
-- first background id: 2697
-- card count: 19
-- first card id: 5160
-- list block id: 3308
-- print block id: 0
-- font table block id: 0
-- style table block id: 0
-- free block count: 3
-- free size: 2048 bytes
-- total size: 32768 bytes
-- stack block size: 3072 bytes
-- created by hypercard version: 0x01228000
-- compacted by hypercard version: 0x01228000
-- modified by hypercard version: 0x01228000
-- opened by hypercard version: 0x01228000
-- patterns[0]: 0x0000000000000000
-- patterns[1]: 0x8000000008000000
-- patterns[2]: 0x8800220088002200
-- patterns[3]: 0x8888222288882222
-- patterns[4]: 0x88AA22AA88AA22AA
-- patterns[5]: 0xCCAA33AACCAA33AA
-- patterns[6]: 0xEEAABBAAEEAABBAA
-- patterns[7]: 0xEEBBBBEEEEBBBBEE
-- patterns[8]: 0xFFBBFFEEFFBBFFEE
-- patterns[9]: 0xFFBBFFFFFFBBFFFF
-- patterns[10]: 0x8010022001084004
-- patterns[11]: 0xFFFFFFFFFFFFFFFF
-- patterns[12]: 0x8822882288228822
-- patterns[13]: 0x1122448811224488
-- patterns[14]: 0xC4800C6843023026
-- patterns[15]: 0xB130031BD8C00C8D
-- patterns[16]: 0xAA00AA00AA00AA00
-- patterns[17]: 0x8822552288225522
-- patterns[18]: 0x8855225588552255
-- patterns[19]: 0x77DD77DD77DD77DD
-- patterns[20]: 0x8000000000000000
-- patterns[21]: 0xAA55AA55AA55AA55
-- patterns[22]: 0x038448300C020101
-- patterns[23]: 0x8244394482010101
-- patterns[24]: 0x8814224188412214
-- patterns[25]: 0x8080413E080814E3
-- patterns[26]: 0x22048C7422179810
-- patterns[27]: 0xBE808808EB088880
-- patterns[28]: 0x25C8328964244C92
-- patterns[29]: 0xA29C41BE2AC914EB
-- patterns[30]: 0x40A00000040A0000
-- patterns[31]: 0x8040200002040800
-- patterns[32]: 0xAA00800088008000
-- patterns[33]: 0xFF80808080808080
-- patterns[34]: 0x081C22C180010204
-- patterns[35]: 0xFF808080FF080808
-- patterns[36]: 0xF87422478F172271
-- patterns[37]: 0xBF00BFBFB0B0B0B0
-- patterns[38]: 0xFF7FBE5DA2418000
-- patterns[39]: 0xFAF5FAF5A050A050
-- checksum: 0x0
----- HyperTalk script -----
on openStack
  hide MenuBar
end openStack

on doScore
  global presName, rightAnswer, thisAnswer, score, alreadyAnswered, numRight, totalNumber
  if alreadyAnswered is true
  then
  put "You've already answered this question." into bg field "response"
  showField
else
  put true into alreadyAnswered
  if thisAnswer = rightAnswer
  then
  put "Right!" into bg field "response"
  showField
  -- calculate
  add 1 to numRight
  put numRight/totalNumber into score
  put round (score * 100) into score
  showScore
else
  put "Wrong.  The correct answer is" && rightAnswer &"." into bg field "response"
  showField
end if
end if
showScore
end doScore

on showScore
  global scorePhrase, score
  put score & "." into last word of scorePhrase
  put scorePhrase into bg field "score"
end showScore

on showField
  lock screen
  show bg field "Response"
  unlock screen with iris open fast
  wait 1 sec
  hide bg field "response"
end showField


on reset
  global scorePhrase, score, numRight, totalNumber
  get number of cards of background id 2697
  put it into totalNumber
  put 0 into numRight
  put 0 into score
  put "Your score is now 0." into scorePhrase
  hide bg field "response"
end reset

on through
  go to card id 5160
  show cd button id 6
end through

on ux
  go to card 5160
  show cd button id 9
end ux